MacTech 1 to 12/MacTech-vol-1-12.toast/Source/MacTech® Magazine/Volume 09 - 1993/09.08 Aug 93/Other AppleScript Samples/Simple Drop Examples/Report Files.txt

Text File | 1993-07-02 | 256 b | 12 lines | [TEXT/ToyS]

on open names
    repeat with i in names
        set f to info for i
        if f's file type is "APPL" and f's file creator = "dplt" then
            tell application (i as string)
                activate -- droplet
                report()
            end tell
        end if
    end repeat
    activate -- Editor
end open